home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / src / X11 / tclMotif-1.4 / programs / prog102 < prev    next >
Encoding:
Text File  |  1995-06-29  |  362 b   |  23 lines
  1. # simple pushButton test
  2. puts "args: $argv"
  3. xtAppInitialize -geometry "=600x500+10+10"
  4. puts "args: $argv"
  5.  
  6. topLevelShell .top -geometry "=600x400+20+20"
  7.  
  8. xmLabel .top.label managed
  9.  
  10. .top popup
  11.  
  12. xmMainWindow .main
  13.  
  14. set base_ .main.r
  15. xmRowColumn $base_ managed
  16. xmLabel $base_.label managed
  17. xmText $base_.text managed
  18.  
  19. .main manageChild
  20.  
  21. . realizeWidget
  22. . mainLoop
  23.